library(mdsr)
library(readr)
library(dplyr)
# Reading in Terrorism
terrorism <- read.table(unz("globalterrorismdb_0718dist.csv.zip", "globalterrorismdb_0718dist.csv"), nrows=181692, header=T, fill =T, quote="\"", sep=",")
econData <- read.csv("WEO_Data.csv")
head(terrorism)